home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1998 January: Mac OS SDK / Dev.CD Jan 98 SDK1.toast / Development Kits (Disc 1) / Interfaces&Libraries / Universal / Interfaces / PInterfaces / Menus.p < prev    next >
Encoding:
Text File  |  1997-08-12  |  13.8 KB  |  419 lines  |  [TEXT/MPS ]
  1. {
  2.      File:        Menus.p
  3.  
  4.      Contains:    Menu Manager Interfaces.
  5.  
  6.      Version:    Technology:    System 7.5
  7.                  Release:    Universal Interfaces 3.0.1
  8.  
  9.      Copyright:    © 1985-1997 by Apple Computer, Inc., all rights reserved.
  10.  
  11.      Bugs?:        Please include the the file and version information (from above) with
  12.                  the problem description.  Developers belonging to one of the Apple
  13.                  developer programs can submit bug reports to:
  14.  
  15.                      devsupport@apple.com
  16.  
  17. }
  18. {$IFC UNDEFINED UsingIncludes}
  19. {$SETC UsingIncludes := 0}
  20. {$ENDC}
  21.  
  22. {$IFC NOT UsingIncludes}
  23.  UNIT Menus;
  24.  INTERFACE
  25. {$ENDC}
  26.  
  27. {$IFC UNDEFINED __MENUS__}
  28. {$SETC __MENUS__ := 1}
  29.  
  30. {$I+}
  31. {$SETC MenusIncludes := UsingIncludes}
  32. {$SETC UsingIncludes := 1}
  33.  
  34. {$IFC UNDEFINED __CONDITIONALMACROS__}
  35. {$I ConditionalMacros.p}
  36. {$ENDC}
  37. {$IFC UNDEFINED __TYPES__}
  38. {$I Types.p}
  39. {$ENDC}
  40. {$IFC UNDEFINED __QUICKDRAW__}
  41. {$I Quickdraw.p}
  42. {$ENDC}
  43.  
  44.  
  45. {$PUSH}
  46. {$ALIGN MAC68K}
  47. {$LibExport+}
  48.  
  49.  
  50. CONST
  51.     noMark                        = 0;                            { mark symbol for MarkItem }
  52.  
  53.                                                                 {  menu defProc messages  }
  54.     mDrawMsg                    = 0;
  55.     mChooseMsg                    = 1;
  56.     mSizeMsg                    = 2;
  57.     mDrawItemMsg                = 4;
  58.     mCalcItemMsg                = 5;
  59.  
  60.     textMenuProc                = 0;
  61.     hMenuCmd                    = 27;                            { itemCmd == 0x001B ==> hierarchical menu }
  62.     hierMenu                    = -1;                            { a hierarchical menu - for InsertMenu call }
  63.     mPopUpMsg                    = 3;                            { menu defProc messages - place yourself }
  64.     mctAllItems                    = -98;                            { search for all Items for the given ID }
  65.     mctLastIDIndic                = -99;                            { last color table entry has this in ID field }
  66.  
  67.  
  68.  
  69. TYPE
  70.     MenuInfoPtr = ^MenuInfo;
  71.     MenuInfo = RECORD
  72.         menuID:                    INTEGER;
  73.         menuWidth:                INTEGER;
  74.         menuHeight:                INTEGER;
  75.         menuProc:                Handle;
  76.         enableFlags:            LONGINT;
  77.         menuData:                Str255;
  78.     END;
  79.  
  80.     MenuPtr                                = ^MenuInfo;
  81.     MenuHandle                            = ^MenuPtr;
  82. {  MenuRef is obsolete.  Use MenuHandle.  }
  83.     MenuRef                                = MenuHandle;
  84.     MCEntryPtr = ^MCEntry;
  85.     MCEntry = RECORD
  86.         mctID:                    INTEGER;                                { menu ID.  ID = 0 is the menu bar }
  87.         mctItem:                INTEGER;                                { menu Item. Item = 0 is a title }
  88.         mctRGB1:                RGBColor;                                { usage depends on ID and Item }
  89.         mctRGB2:                RGBColor;                                { usage depends on ID and Item }
  90.         mctRGB3:                RGBColor;                                { usage depends on ID and Item }
  91.         mctRGB4:                RGBColor;                                { usage depends on ID and Item }
  92.         mctReserved:            INTEGER;                                { reserved for internal use }
  93.     END;
  94.  
  95.     MCTable                                = ARRAY [0..0] OF MCEntry;
  96.     MCTablePtr                            = ^MCTable;
  97.     MCTableHandle                        = ^MCTablePtr;
  98.     MenuCRsrcPtr = ^MenuCRsrc;
  99.     MenuCRsrc = RECORD
  100.         numEntries:                INTEGER;                                { number of entries }
  101.         mcEntryRecs:            MCTable;                                { ARRAY [1..numEntries] of MCEntry }
  102.     END;
  103.  
  104.     MenuCRsrcHandle                        = ^MenuCRsrcPtr;
  105.  
  106.  
  107.     MenuDefProcPtr = ProcPtr;  { PROCEDURE MenuDef(message: INTEGER; theMenu: MenuHandle; VAR menuRect: Rect; hitPt: Point; VAR whichItem: INTEGER); }
  108.  
  109.     MenuBarDefProcPtr = ProcPtr;  { FUNCTION MenuBarDef(selector: INTEGER; message: INTEGER; parameter1: INTEGER; parameter2: LONGINT): LONGINT; }
  110.  
  111.     MenuHookProcPtr = ProcPtr;  { PROCEDURE MenuHook; }
  112.  
  113.     MBarHookProcPtr = Register68kProcPtr;  { FUNCTION MBarHook(VAR menuRect: Rect): INTEGER; }
  114.  
  115.     MenuDefUPP = UniversalProcPtr;
  116.     MenuBarDefUPP = UniversalProcPtr;
  117.     MenuHookUPP = UniversalProcPtr;
  118.     MBarHookUPP = UniversalProcPtr;
  119.  
  120. CONST
  121.     uppMenuDefProcInfo = $0000FF80;
  122.     uppMenuBarDefProcInfo = $00003AB0;
  123.     uppMenuHookProcInfo = $00000000;
  124.     uppMBarHookProcInfo = $000000CF;
  125.  
  126. FUNCTION NewMenuDefProc(userRoutine: MenuDefProcPtr): MenuDefUPP;
  127.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  128.     INLINE $2E9F;
  129.     {$ENDC}
  130.  
  131. FUNCTION NewMenuBarDefProc(userRoutine: MenuBarDefProcPtr): MenuBarDefUPP;
  132.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  133.     INLINE $2E9F;
  134.     {$ENDC}
  135.  
  136. FUNCTION NewMenuHookProc(userRoutine: MenuHookProcPtr): MenuHookUPP;
  137.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  138.     INLINE $2E9F;
  139.     {$ENDC}
  140.  
  141. FUNCTION NewMBarHookProc(userRoutine: MBarHookProcPtr): MBarHookUPP;
  142.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  143.     INLINE $2E9F;
  144.     {$ENDC}
  145.  
  146. PROCEDURE CallMenuDefProc(message: INTEGER; theMenu: MenuHandle; VAR menuRect: Rect; hitPt: Point; VAR whichItem: INTEGER; userRoutine: MenuDefUPP);
  147.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  148.     INLINE $205F, $4E90;
  149.     {$ENDC}
  150.  
  151. FUNCTION CallMenuBarDefProc(selector: INTEGER; message: INTEGER; parameter1: INTEGER; parameter2: LONGINT; userRoutine: MenuBarDefUPP): LONGINT;
  152.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  153.     INLINE $205F, $4E90;
  154.     {$ENDC}
  155.  
  156. PROCEDURE CallMenuHookProc(userRoutine: MenuHookUPP);
  157.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  158.     INLINE $205F, $4E90;
  159.     {$ENDC}
  160.  
  161. FUNCTION CallMBarHookProc(VAR menuRect: Rect; userRoutine: MBarHookUPP): INTEGER;
  162.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  163.     {To be implemented:  Glue to move parameters into registers.}
  164.     {$ENDC}
  165.  
  166. FUNCTION GetMBarHeight: INTEGER;
  167.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  168.     INLINE $3EB8, $0BAA;
  169.     {$ENDC}
  170. PROCEDURE InitMenus;
  171.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  172.     INLINE $A930;
  173.     {$ENDC}
  174. FUNCTION NewMenu(menuID: INTEGER; menuTitle: ConstStr255Param): MenuHandle;
  175.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  176.     INLINE $A931;
  177.     {$ENDC}
  178. FUNCTION GetMenu(resourceID: INTEGER): MenuHandle;
  179.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  180.     INLINE $A9BF;
  181.     {$ENDC}
  182. PROCEDURE DisposeMenu(theMenu: MenuHandle);
  183.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  184.     INLINE $A932;
  185.     {$ENDC}
  186. PROCEDURE AppendMenu(menu: MenuHandle; data: ConstStr255Param);
  187.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  188.     INLINE $A933;
  189.     {$ENDC}
  190. PROCEDURE InsertResMenu(theMenu: MenuHandle; theType: ResType; afterItem: INTEGER);
  191.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  192.     INLINE $A951;
  193.     {$ENDC}
  194. PROCEDURE InsertMenu(theMenu: MenuHandle; beforeID: INTEGER);
  195.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  196.     INLINE $A935;
  197.     {$ENDC}
  198. PROCEDURE DeleteMenu(menuID: INTEGER);
  199.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  200.     INLINE $A936;
  201.     {$ENDC}
  202. PROCEDURE AppendResMenu(theMenu: MenuHandle; theType: ResType);
  203.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  204.     INLINE $A94D;
  205.     {$ENDC}
  206. PROCEDURE InsertMenuItem(theMenu: MenuHandle; itemString: ConstStr255Param; afterItem: INTEGER);
  207.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  208.     INLINE $A826;
  209.     {$ENDC}
  210. PROCEDURE DeleteMenuItem(theMenu: MenuHandle; item: INTEGER);
  211.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  212.     INLINE $A952;
  213.     {$ENDC}
  214. FUNCTION MenuKey(ch: CharParameter): LONGINT;
  215.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  216.     INLINE $A93E;
  217.     {$ENDC}
  218. PROCEDURE HiliteMenu(menuID: INTEGER);
  219.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  220.     INLINE $A938;
  221.     {$ENDC}
  222. PROCEDURE SetMenuItemText(theMenu: MenuHandle; item: INTEGER; itemString: ConstStr255Param);
  223.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  224.     INLINE $A947;
  225.     {$ENDC}
  226. PROCEDURE GetMenuItemText(theMenu: MenuHandle; item: INTEGER; VAR itemString: Str255);
  227.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  228.     INLINE $A946;
  229.     {$ENDC}
  230. PROCEDURE SetItemMark(theMenu: MenuHandle; item: INTEGER; markChar: CharParameter);
  231.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  232.     INLINE $A944;
  233.     {$ENDC}
  234. PROCEDURE GetItemMark(theMenu: MenuHandle; item: INTEGER; VAR markChar: CharParameter);
  235.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  236.     INLINE $A943;
  237.     {$ENDC}
  238. PROCEDURE SetItemCmd(theMenu: MenuHandle; item: INTEGER; cmdChar: CharParameter);
  239.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  240.     INLINE $A84F;
  241.     {$ENDC}
  242. PROCEDURE GetItemCmd(theMenu: MenuHandle; item: INTEGER; VAR cmdChar: CharParameter);
  243.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  244.     INLINE $A84E;
  245.     {$ENDC}
  246. PROCEDURE SetItemIcon(theMenu: MenuHandle; item: INTEGER; iconIndex: INTEGER);
  247.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  248.     INLINE $A940;
  249.     {$ENDC}
  250. PROCEDURE GetItemIcon(theMenu: MenuHandle; item: INTEGER; VAR iconIndex: Byte);
  251.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  252.     INLINE $A93F;
  253.     {$ENDC}
  254. PROCEDURE SetItemStyle(theMenu: MenuHandle; item: INTEGER; chStyle: StyleParameter);
  255.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  256.     INLINE $A942;
  257.     {$ENDC}
  258. PROCEDURE GetItemStyle(theMenu: MenuHandle; item: INTEGER; VAR chStyle: Style);
  259. FUNCTION GetMenuHandle(menuID: INTEGER): MenuHandle;
  260.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  261.     INLINE $A949;
  262.     {$ENDC}
  263. PROCEDURE CalcMenuSize(theMenu: MenuHandle);
  264.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  265.     INLINE $A948;
  266.     {$ENDC}
  267. PROCEDURE DisableItem(theMenu: MenuHandle; item: INTEGER);
  268.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  269.     INLINE $A93A;
  270.     {$ENDC}
  271. PROCEDURE EnableItem(theMenu: MenuHandle; item: INTEGER);
  272.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  273.     INLINE $A939;
  274.     {$ENDC}
  275. PROCEDURE FlashMenuBar(menuID: INTEGER);
  276.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  277.     INLINE $A94C;
  278.     {$ENDC}
  279. FUNCTION PopUpMenuSelect(menu: MenuHandle; top: INTEGER; left: INTEGER; popUpItem: INTEGER): LONGINT;
  280.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  281.     INLINE $A80B;
  282.     {$ENDC}
  283. FUNCTION MenuChoice: LONGINT;
  284.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  285.     INLINE $AA66;
  286.     {$ENDC}
  287. PROCEDURE DeleteMCEntries(menuID: INTEGER; menuItem: INTEGER);
  288.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  289.     INLINE $AA60;
  290.     {$ENDC}
  291. FUNCTION GetMCInfo: MCTableHandle;
  292.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  293.     INLINE $AA61;
  294.     {$ENDC}
  295. PROCEDURE SetMCInfo(menuCTbl: MCTableHandle);
  296.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  297.     INLINE $AA62;
  298.     {$ENDC}
  299. PROCEDURE DisposeMCInfo(menuCTbl: MCTableHandle);
  300.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  301.     INLINE $AA63;
  302.     {$ENDC}
  303. FUNCTION GetMCEntry(menuID: INTEGER; menuItem: INTEGER): MCEntryPtr;
  304.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  305.     INLINE $AA64;
  306.     {$ENDC}
  307. PROCEDURE SetMCEntries(numEntries: INTEGER; menuCEntries: MCTablePtr);
  308.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  309.     INLINE $AA65;
  310.     {$ENDC}
  311. PROCEDURE DrawMenuBar;
  312.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  313.     INLINE $A937;
  314.     {$ENDC}
  315. PROCEDURE InvalMenuBar;
  316.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  317.     INLINE $A81D;
  318.     {$ENDC}
  319. PROCEDURE InitProcMenu(resID: INTEGER);
  320.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  321.     INLINE $A808;
  322.     {$ENDC}
  323. FUNCTION GetMenuBar: Handle;
  324.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  325.     INLINE $A93B;
  326.     {$ENDC}
  327. PROCEDURE SetMenuBar(menuList: Handle);
  328.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  329.     INLINE $A93C;
  330.     {$ENDC}
  331. FUNCTION SystemEdit(editCmd: INTEGER): BOOLEAN;
  332.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  333.     INLINE $A9C2;
  334.     {$ENDC}
  335. PROCEDURE SystemMenu(menuResult: LONGINT);
  336.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  337.     INLINE $A9B5;
  338.     {$ENDC}
  339. FUNCTION GetNewMBar(menuBarID: INTEGER): Handle;
  340.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  341.     INLINE $A9C0;
  342.     {$ENDC}
  343. PROCEDURE ClearMenuBar;
  344.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  345.     INLINE $A934;
  346.     {$ENDC}
  347. PROCEDURE CheckItem(theMenu: MenuHandle; item: INTEGER; checked: BOOLEAN);
  348.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  349.     INLINE $A945;
  350.     {$ENDC}
  351. FUNCTION CountMItems(theMenu: MenuHandle): INTEGER;
  352.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  353.     INLINE $A950;
  354.     {$ENDC}
  355. PROCEDURE SetMenuFlash(count: INTEGER);
  356.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  357.     INLINE $A94A;
  358.     {$ENDC}
  359. FUNCTION MenuSelect(startPt: Point): LONGINT;
  360.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  361.     INLINE $A93D;
  362.     {$ENDC}
  363. PROCEDURE InsertFontResMenu(theMenu: MenuHandle; afterItem: INTEGER; scriptFilter: INTEGER);
  364.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  365.     INLINE $303C, $0400, $A825;
  366.     {$ENDC}
  367. PROCEDURE InsertIntlResMenu(theMenu: MenuHandle; theType: ResType; afterItem: INTEGER; scriptFilter: INTEGER);
  368.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  369.     INLINE $303C, $0601, $A825;
  370.     {$ENDC}
  371.  
  372.  
  373. {$IFC OLDROUTINENAMES }
  374. PROCEDURE AddResMenu(theMenu: MenuHandle; theType: ResType);
  375.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  376.     INLINE $A94D;
  377.     {$ENDC}
  378. PROCEDURE InsMenuItem(theMenu: MenuHandle; itemString: Str255; afterItem: INTEGER);
  379.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  380.     INLINE $A826;
  381.     {$ENDC}
  382. PROCEDURE DelMenuItem(theMenu: MenuHandle; item: INTEGER);
  383.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  384.     INLINE $A952;
  385.     {$ENDC}
  386. PROCEDURE SetItem(theMenu: MenuHandle; item: INTEGER; itemString: Str255);
  387.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  388.     INLINE $A947;
  389.     {$ENDC}
  390. PROCEDURE GetItem(theMenu: MenuHandle; item: INTEGER; VAR itemString: Str255);
  391.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  392.     INLINE $A946;
  393.     {$ENDC}
  394. FUNCTION GetMHandle(menuID: INTEGER): MenuHandle;
  395.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  396.     INLINE $A949;
  397.     {$ENDC}
  398. PROCEDURE DelMCEntries(menuID: INTEGER; menuItem: INTEGER);
  399.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  400.     INLINE $AA60;
  401.     {$ENDC}
  402. PROCEDURE DispMCInfo(menuCTbl: MCTableHandle);
  403.     {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
  404.     INLINE $AA63;
  405.     {$ENDC}
  406. {$ENDC}  {OLDROUTINENAMES}
  407.  
  408.  
  409. {$ALIGN RESET}
  410. {$POP}
  411.  
  412. {$SETC UsingIncludes := MenusIncludes}
  413.  
  414. {$ENDC} {__MENUS__}
  415.  
  416. {$IFC NOT UsingIncludes}
  417.  END.
  418. {$ENDC}
  419.